home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mission 3
/
Mission 3.zip
/
Mission 3.iso
/
spiele
/
sac
/
convert.bas
(
.txt
)
< prev
next >
Wrap
Atari STOS Basic
|
1989-07-28
|
3KB
|
63 lines
10 REM ~~~ SAC CONVERTER
100 IF
110 IF
120 IF
130 GOTO
140 REM ~~~ Load Var File
150 SHOW
160 IF
170 HIDE
180 GOSUB
190 BELL
20 KEY
200 REM ~~~ Load Adv File
210 SHOW
220 IF
230 HIDE
240 BELL
250 REM ~~~ LOAD OLD ADV FILE FOR SAC V1.02 AND V1.03
260 DIM
270 OPEN IN
280 LINE INPUT
290 FOR
30 CENTRE
300 LINE INPUT
310 FOR
320 LINE INPUT
330 LINE INPUT
340 FOR
350 FOR
360 FOR
370 FOR
380 FOR
390 FOR
40 LOCATE
400 FOR
410 FOR
420 CLOSE
430 REM ~~~ SAVE AS ADV FILE FOR SAC V1.04
440 SHOW
450 IF
460 IF
470 OPEN OUT
480 PRINT
490 FOR
50 LOCATE
500 PRINT
510 FOR
520 PRINT
530 PRINT
540 FOR
550 FOR
560 FOR
570 FOR
580 FOR
590 FOR
60 LOCATE
600 FOR
610 FOR
620 CLOSE
70 LOCATE
80 LOCATE
90 VARNAME